home *** CD-ROM | disk | FTP | other *** search
/ Aminet 52 / Aminet 52 (2002)(GTI - Schatztruhe)[!][Dec 2002].iso / Aminet / game / demo / ToTDemo0.45_R5.lha / talesdemo / rexx / MiamiOffline.rexx < prev    next >
OS/2 REXX Batch file  |  1999-08-30  |  888b  |  21 lines
  1. /******************************************************************************************************/
  2. /* Online-Script mit Arexx                                                                            */
  3. /*     © by Martin Wolf / Eternity Hard & Software                                                  */
  4. /*      First Bit set: 03.05.1998                                                                     */
  5. /*      Last Bit set :                                                                                */
  6. /******************************************************************************************************/
  7.  
  8. OPTIONS RESULTS
  9.  
  10. ADDRESS COMMAND
  11.     DO UNTIL SHOW('P','MIAMI.1')            /* Auf Miami warten */
  12.       SIGNAL OFF ERROR
  13.       'WaitForPort MIAMI.1'
  14.       SIGNAL ON ERROR
  15.     END
  16.         miamiport = MIAMI.1                /* ist auf jeden Fall der aktive Port */
  17.  
  18. ADDRESS (miamiport)
  19.     OFFLINE
  20.     EXIT
  21.